object Browse_fm: TBrowse_fm Left = 248 Top = 461 BorderIcons = [biSystemMenu, biHelp] BorderStyle = bsDialog Caption = 'Browse and Run Application' ClientHeight = 195 ClientWidth = 479 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate OnKeyPress = FormKeyPress PixelsPerInch = 96 TextHeight = 13 object Label2: TLabel Left = 8 Top = 64 Width = 73 Height = 13 Caption = 'Command Line:' end object RunBtn: TSpeedButton Left = 392 Top = 32 Width = 81 Height = 25 Caption = '&Run' Glyph.Data = { 20020000424D2002000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333033333333333333333338F33333333333333333380333333333333 33333388F3333333333333333330033333333333333333388F33333333333333 3330B033333333333333333838F333333333333333000B033333333333333388 838F33333333333330BBBBB033333333333338333338F33333333333330FB000 033333333333338338888F3333333333330BBB033333333333333383338F3333 333333300000BFB033333333333888883338F33333333330FBBBFBBB03333333 3338333333338F33333333330FBFB0000033333333338333388888F333333333 0BFBFB033333333333338333338FFF333333333330BFBFB03333333333333833 3338F3333333333330FFFFFF033333333333383333338F3333333333330FBFFB F033333333333383333338F33333333333000000000333333333338888888883 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333300000000000000000000000000000000000000000000 00000000} NumGlyphs = 2 OnClick = RunBtnClick end object CancelBtn: TSpeedButton Left = 392 Top = 64 Width = 81 Height = 25 Caption = '&Cancel' Glyph.Data = { DE010000424DDE01000000000000760000002800000024000000120000000100 04000000000068010000CE0E0000C40E00000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333333333333333000033338833333333333333333F333333333333 0000333911833333983333333388F333333F3333000033391118333911833333 38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333 911118111118333338F3338F833338F3000033333911111111833333338F3338 3333F8330000333333911111183333333338F333333F83330000333333311111 8333333333338F3333383333000033333339111183333333333338F333833333 00003333339111118333333333333833338F3333000033333911181118333333 33338333338F333300003333911183911183333333383338F338F33300003333 9118333911183333338F33838F338F33000033333913333391113333338FF833 38F338F300003333333333333919333333388333338FFF830000333333333333 3333333333333333333888330000333333333333333333333333333333333333 0000} NumGlyphs = 2 OnClick = CancelBtnClick end object BrowseForExeBtn: TSpeedButton Left = 353 Top = 80 Width = 22 Height = 22 Glyph.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFF000000000FFFFFF0000FF00 00000008070FFFFF0000FF0B7B7B7B070330FFFF0000FF07B777B7080730FFFF 0000FF0B70007B070330FFFF0000FF07B7B7B7070730FFFF0000FF0B7B7B7B07 0330FFFF0000FF00000000080730FFFF0000FFF0FFFFFF080330FFFF0000FFF0 FC7C7F0B0730FFFF0000FFF0F7777F070330FFFF0000FFF0FC7C7F0B0730FFFF 0000FFF0FFFFFF000330FFFF0000FFF0000000077030FFFF0000FFFFF0B7B7B7 B700FFFF0000FFFFFF0000000000FFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF FFFFFFFFFFFFFFFF0000} OnClick = BrowseForExeBtnClick end object Label3: TLabel Left = 8 Top = 3 Width = 465 Height = 19 AutoSize = False Caption = 'Browse for an application anywhere on your computer' Font.Color = clNavy Font.Height = -13 Font.Name = 'Arial' Font.Style = [fsItalic] ParentFont = False end object Label4: TLabel Left = 8 Top = 36 Width = 69 Height = 13 Caption = 'Startup Folder:' end object BrowseForDir: TSpeedButton Left = 353 Top = 32 Width = 22 Height = 22 Glyph.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF FFFFFFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFFF000000000FFFFFF0000FF00 00000008070FFFFF0000FF0B7B7B7B070330FFFF0000FF07B777B7080730FFFF 0000FF0B70007B070330FFFF0000FF07B7B7B7070730FFFF0000FF0B7B7B7B07 0330FFFF0000FF00000000080730FFFF0000FFF0FFFFFF080330FFFF0000FFF0 FC7C7F0B0730FFFF0000FFF0F7777F070330FFFF0000FFF0FC7C7F0B0730FFFF 0000FFF0FFFFFF000330FFFF0000FFF0000000077030FFFF0000FFFFF0B7B7B7 B700FFFF0000FFFFFF0000000000FFFF0000FFFFFFFFFFFFFFFFFFFF0000FFFF FFFFFFFFFFFFFFFF0000} OnClick = BrowseForDirClick end object HelpBtn: TSpeedButton Left = 392 Top = 96 Width = 81 Height = 25 Hint = 'Help' Caption = '&Help' Glyph.Data = { DE010000424DDE01000000000000760000002800000024000000120000000100 04000000000068010000CE0E0000C40E00000000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333336633 3333333333333FF3333333330000333333364463333333333333388F33333333 00003333333E66433333333333338F38F3333333000033333333E66333333333 33338FF8F3333333000033333333333333333333333338833333333300003333 3333446333333333333333FF3333333300003333333666433333333333333888 F333333300003333333E66433333333333338F38F333333300003333333E6664 3333333333338F38F3333333000033333333E6664333333333338F338F333333 0000333333333E6664333333333338F338F3333300003333344333E666433333 333F338F338F3333000033336664333E664333333388F338F338F33300003333 E66644466643333338F38FFF8338F333000033333E6666666663333338F33888 3338F3330000333333EE666666333333338FF33333383333000033333333EEEE E333333333388FFFFF8333330000333333333333333333333333388888333333 0000} NumGlyphs = 2 OnClick = HelpBtnClick end object CommandEdit: TComboBox Left = 8 Top = 80 Width = 345 Height = 21 ItemHeight = 13 TabOrder = 0 end object OptionsRG: TRadioGroup Left = 8 Top = 112 Width = 369 Height = 73 Caption = 'Options' ItemIndex = 0 Items.Strings = ( 'Run &Normal' 'Run &Minimized' 'Run Ma&ximized') TabOrder = 1 end object StartupDirEdit: TComboBox Left = 96 Top = 32 Width = 257 Height = 21 ItemHeight = 13 TabOrder = 2 end object OpenDialog: TOpenDialog FileEditStyle = fsEdit Filter = 'Programs|*.bat;*.com;*.exe;|All Files|*.*' Options = [ofHideReadOnly, ofNoChangeDir, ofPathMustExist, ofFileMustExist] Title = 'Browse Applications' Left = 368 end end